package StockInfo;
use strict;
use ObjectInfo;
use vars qw /@ISA/;
@ISA = ("ObjectInfo");

###############################
#{
#	'Best1OffVolume' => '1601',
#	'Best1BidPrice' => '0',
#	'Best2BidPrice' => '0',
#	'SS2MatchVolume' => '512',
#	'Best3OffVolume' => '87',
#	'SS2MatchPrice' => '54',
#	'Best1OffPrice' => '54',
#	'Best3BidVolume' => '0',
#	'Best3BidPrice' => '0',
#	'Symbol' => 'ABT',
#	'Best3OffPrice' => '56',
#	'CeilingPrice' => '59',
#	'RefPrice' => '56.5',
#	'HighestPrice' => undef,
#	'CHANNEL_NAME' => 'SSI_HoSE',
#	'FBuy' => undef,
#	'Best1BidVolume' => '0',
#	'SYS_SEQ' => '1',
#	'LowestPrice' => undef,
#	'TempVolume' => '1358',
#	'Best2OffVolume' => '60',
#	'FRoom' => '0',
#	'FloorPrice' => '54',
#	'Best2BidVolume' => '0',
#	'SS1MatchPrice' => '54',
#	'ChangedPrice' => 'FL-2.5',
#	'Best2OffPrice' => '54.5',
#	'SS1MatchVolume' => '226',
#	'TempPrice' => '54',
#	'Description' => 'CTCP XNK THUY SAN BEN TRE'
#}
###############################################
sub new{
	my $class = shift;
	my $self = $class->SUPER::new();
	$self->{'CLASS_NAME'} = 'StockInfo';
	bless $self, $class;
	return $self;	
}

sub DESTROY{
	
}

1;